home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / COMMUNIC / H191.ZIP / CA29-3.EXE / BIX.CMD < prev    next >
OS/2 REXX Batch file  |  1992-10-25  |  2KB  |  45 lines
  1. LEGEND " BIX.CMD"               ; Put script name on status bar...
  2. ;
  3. ; ----- BIX: Connect to BIX through TymNet
  4. ; ----------------------------------------------------------------
  5. ;    Note: You must create a logon file with MKLOGON in order to
  6. ;    have this script automatically log you on... Please see the
  7. ;    file SCRIPTS.DOC
  8. ; ----------------------------------------------------------------
  9. ;    Note: This script is written to be FCALLed, executed directly (F2)
  10. ;    or attached to a dialing directory entry (for manual execution).
  11. ; ----------------------------------------------------------------
  12. ;    Note: This script requires the script TYMNET.CMD.  TYMNET.CMD
  13. ;    requires that a dialing directory entry number be prepared.
  14. ;    Unless you modify TYMNET.CMD, the entry number defaults to 9.
  15. ; ----------------------------------------------------------------
  16. ;    S0 is modified by this script.
  17. ; ----------------------------------------------------------------
  18. ;
  19. ;    Call Tymnet (if not already dialed)
  20. ;
  21.     IF NOT ISSC "TYMNET"    ; If script not available
  22.        MESS "TYMNET.CMD script not found"
  23.        EXIT         ; terminate script
  24.        ENDIF
  25.     FCALL "Tymnet"          ; Dial Tymnet
  26.     LEGEND " Connecting to BIX..."
  27. ;
  28. ;    Connect to BIX
  29. ;
  30.     TRANSMIT "bix!"         ; Tell Tymnet to connect to BIX
  31. ;
  32. ;    Wait for ID prompt
  33. ;
  34.     WAITFOR "Name? "        ; Wait for BIX name prompt
  35. ;
  36. ;    If we have a BIXLOGON file, use it
  37. ;
  38.     SET TTHRU OFF        ; Let psw be typed
  39.     IF ISSCFILE "BIXLOGON" FCALL "BIXLOGON"
  40. ;
  41. ;    Exit - this script may be fcalled
  42. ;
  43.     IF FCALLED FRETURN    ; Return to caller if called
  44.     ALARM            ; Otherwise, sound alarm - we're done
  45.